home *** CD-ROM | disk | FTP | other *** search
/ Freaks Macintosh Archive / Freaks Macintosh Archive.bin / Freaks Macintosh Archives / Phreaking⁄Wardialers / Term Applications / ComLink / Scripts / Hermes Login next >
Text File  |  1995-12-17  |  357b  |  14 lines
  1. tell application "ComLinkPPC"
  2.     set myport to port 1
  3.     connect myport
  4.     if the result is true then
  5.         scan myport text "mber:" timeout 3
  6.         output myport macro 1
  7.         scan myport text {"T - ", "your mail now?"}
  8.         if the result is "T - " then
  9.             output myport text "N"
  10.         else if the result is "your mail now?" then
  11.             output myport text "Y"
  12.         end if
  13.     end if
  14. end tell